home *** CD-ROM | disk | FTP | other *** search
/ Star Festival... a Return to Japan / Star Festival... a Return to Japan.iso / pc / STARFESTIVAL / 16p.dir / 00001.ls next >
Encoding:
Text File  |  1999-04-05  |  1.9 KB  |  70 lines
  1. on startMovie
  2.   global gKnobSprite, gSendMovie, gCursorReady, gKnobState
  3.   puppetSprite(48, 1)
  4.   gCursorReady = 1
  5.   gKnobSprite = 14
  6.   gSendMovie = "16p"
  7.   gKnobState = 1
  8.   puppetSprite(gKnobSprite, 1)
  9.   setUpKnob()
  10.   set the mouseDownScript to EMPTY
  11.   set the mouseUpScript to EMPTY
  12.   sprite(34).visible = 0
  13. end
  14.  
  15. on stopMovie
  16.   when timeOut then nothing
  17. end
  18.  
  19. on idle
  20.   global gCursorReady
  21.   if gCursorReady = 1 then
  22.     cursor(200)
  23.     checkCursors()
  24.     set the locH of sprite 48 to the mouseH
  25.     set the locV of sprite 48 to the mouseV
  26.     updateStage()
  27.   end if
  28. end
  29.  
  30. on checkCursors
  31.   global gMagCursor
  32.   gMagCursor = "magCursor"
  33.   set the castNum of sprite 48 to the number of member "curs1"
  34.   if the castNum of sprite 6 and rollOver(6) then
  35.     set the castNum of sprite 48 to the number of member gMagCursor
  36.   end if
  37.   if the castNum of sprite 8 and rollOver(8) then
  38.     set the castNum of sprite 48 to the number of member "deMagCursor"
  39.   end if
  40.   repeat with i = 15 to 17
  41.     if rollOver(i) then
  42.       set the castNum of sprite 48 to the number of member "hotCursor"
  43.     end if
  44.   end repeat
  45.   repeat with i = 20 to 21
  46.     if the castNum of sprite i and rollOver(i) then
  47.       set the castNum of sprite 48 to the number of member "hotCursor"
  48.     end if
  49.   end repeat
  50.   if the castNum of sprite 26 and rollOver(26) then
  51.     set the castNum of sprite 48 to the number of member "linkCurs"
  52.   end if
  53.   repeat with i = 31 to 32
  54.     if rollOver(i) then
  55.       set the castNum of sprite 48 to the number of member "hotCursor"
  56.     end if
  57.   end repeat
  58.   if rollOver(34) and (sprite(34).visible = 1) then
  59.     set the castNum of sprite 48 to the number of member "hotCursor"
  60.   end if
  61.   repeat with i = 40 to 42
  62.     if rollOver(i) then
  63.       set the castNum of sprite 48 to the number of member "hotCursor"
  64.     end if
  65.   end repeat
  66.   if the castNum of sprite 47 and rollOver(47) then
  67.     set the castNum of sprite 48 to the number of member "hotCursor"
  68.   end if
  69. end
  70.